Imports sk.dal
Partial Class ConfigureCategories

    Inherits System.Web.UI.Page

    Protected Sub btnAddCategory_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles btnAddCategory.Click
        Dim cat As New CategoryObj
        cat.Name = txtNewCategory.Text
        cat.CreateCategory()
        txtNewCategory.Text = ""
        GridView1.DataBind()
    End Sub
End Class
